home *** CD-ROM | disk | FTP | other *** search
/ Libris Britannia 4 / science library(b).zip / science library(b) / PROGRAMM / DB_CLIPP / 0292.ZIP / CUBS.ARC / BOMB.PRG < prev    next >
Text File  |  1985-12-21  |  256b  |  23 lines
  1. *BOMB.PRG
  2.  
  3. CLEAR
  4. ? 'Please move away from the Central Processing Unit to avoid ì
  5. schrapnel wounds.'
  6. ?
  7. ?
  8. ?
  9. ?
  10. ?
  11. WAIT
  12. CLEAR
  13. X=0
  14. DO WHILE X < 10
  15. X=X+1
  16.  
  17. @ 13,35 SAY 'BOOM!!!'
  18. ? CHR(7)
  19. ENDDO
  20. RETURN
  21.  
  22.  
  23.